home *** CD-ROM | disk | FTP | other *** search
- .Key LOGICAL,PATH
- .bra {
- .ket }
-
- Print >RAM:T/KaraCD-IPT/TempLine -n "Assign >NIL: {LOGICAL}"
-
- Failat 23
-
- Assign >NIL: {LOGICAL} EXISTS
- If NOT WARN
- ShowPath >RAM:T/KaraCD-IPT/TempPath -n {LOGICAL}
- If WARN
- SetEnv <RAM:T/KaraCD-IPT/TempPath >NIL: KaraCDLastPath ?
- If "$KaraCDLastPath" EQ "Specified path does not exist"
- Delete >NIL: RAM:T/KaraCD-IPT/TempPath QUIET
- Else
- Print >>RAM:T/KaraCD-IPT/TempPath -n " DEFER"
- EndIf
- EndIf
- If EXISTS RAM:T/KaraCD-IPT/TempPath
- Print >>RAM:T/KaraCD-IPT/TempLine -n " "
- Print >>RAM:T/KaraCD-IPT/TempLine -f RAM:T/KaraCD-IPT/TempPath
- EndIf
- EndIf
-
- Print >>RAM:T/KaraCD-IPT/TempLine ""
-
- Assign >NIL: {LOGICAL} {PATH}
- If NOT FAIL
- Execute AddLine
- EndIf
-
-
- ; Cloanto ® CD-ROM Configuration Scripts
- ; Copyright © 1995, 1996 Cloanto Italia srl - All Rights Reserved
- ; Cloanto is a registered trademark of Cloanto Italia srl
-